home *** CD-ROM | disk | FTP | other *** search
/ Hyper Stacks 1994 May / Hyper Stacks (Pacific HiTech)(1994)[Mac].iso / Reference / THE AIDS STACK / card_4750.txt < prev    next >
Text File  |  1988-01-11  |  5KB  |  255 lines
  1. -- card: 4750 from stack: in
  2. -- bmap block id: 96681
  3. -- flags: 0000
  4. -- background id: 50910
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on idle
  8.   put the date into line 1 of card field id 29 of card id 4750
  9.   put "TODAY'S" into line 1 of card field id 20 of card id 4750
  10.   put "DATE" into line 2 of card field id 20 of card id 4750
  11.  
  12.   put the long time into line 1 of card field id 30 of card id 4750
  13.   put "CURRENT" into line 1 of card field id 26 of card id 4750
  14.   put "TIME" into line 2 of card field id 26 of card id 4750
  15.  
  16.   set the numberFormat to "0."
  17.   put (the seconds - 2639606400) / 2740.8 + 40845 into line 1 of card field id 31 of card id 4750
  18.   put "TOTAL AIDS" into line 1 of card field id 27 of card id 4750
  19.   put "CASES" into line 2 of card field id 27 of card id 4750
  20.  
  21.   set the numberFormat to "0."
  22.   put (the seconds - 2639606400)/11317.7 + 23559 into line 1 of card field id 32 of card id 4750
  23.   put "TOTAL AIDS" into line 1 of card field id 28 of card id 4750
  24.   put "DEATHS" into line 2 of card field id 28 of card id 4750
  25.  
  26.   pass idle
  27. end idle
  28.  
  29.  
  30. -- part 18 (button)
  31. -- low flags: 00
  32. -- high flags: 2000
  33. -- rect: left=329 top=271 right=308 bottom=358
  34. -- title width / last selected line: 0
  35. -- icon id / first selected line: 0 / 0
  36. -- text alignment: 1
  37. -- font id: 0
  38. -- text size: 12
  39. -- style flags: 0
  40. -- line height: 16
  41. -- part name: NEXT CARD
  42. ----- HyperTalk script -----
  43. on mouseUp
  44.   visual effect barn door open
  45.   go to card id 85329
  46. end mouseUp
  47.  
  48.  
  49.  
  50. -- part 19 (button)
  51. -- low flags: 00
  52. -- high flags: 2000
  53. -- rect: left=359 top=271 right=308 bottom=388
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 1
  57. -- font id: 0
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: NEXT CARD
  62. ----- HyperTalk script -----
  63. on mouseUp
  64.   visual effect barn door open
  65.   go to card id 51251
  66. end mouseUp
  67.  
  68.  
  69.  
  70. -- part 20 (field)
  71. -- low flags: 00
  72. -- high flags: 0000
  73. -- rect: left=24 top=133 right=159 bottom=141
  74. -- title width / last selected line: 0
  75. -- icon id / first selected line: 0 / 0
  76. -- text alignment: 1
  77. -- font id: 3
  78. -- text size: 12
  79. -- style flags: 256
  80. -- line height: 12
  81. -- part name: 
  82.  
  83.  
  84. -- part 26 (field)
  85. -- low flags: 00
  86. -- high flags: 0000
  87. -- rect: left=142 top=133 right=159 bottom=259
  88. -- title width / last selected line: 0
  89. -- icon id / first selected line: 0 / 0
  90. -- text alignment: 1
  91. -- font id: 3
  92. -- text size: 12
  93. -- style flags: 256
  94. -- line height: 12
  95. -- part name: 
  96.  
  97.  
  98. -- part 27 (field)
  99. -- low flags: 00
  100. -- high flags: 0000
  101. -- rect: left=260 top=133 right=159 bottom=377
  102. -- title width / last selected line: 0
  103. -- icon id / first selected line: 0 / 0
  104. -- text alignment: 1
  105. -- font id: 3
  106. -- text size: 12
  107. -- style flags: 256
  108. -- line height: 12
  109. -- part name: 
  110.  
  111.  
  112. -- part 28 (field)
  113. -- low flags: 00
  114. -- high flags: 0000
  115. -- rect: left=378 top=133 right=159 bottom=495
  116. -- title width / last selected line: 0
  117. -- icon id / first selected line: 0 / 0
  118. -- text alignment: 1
  119. -- font id: 3
  120. -- text size: 12
  121. -- style flags: 256
  122. -- line height: 12
  123. -- part name: 
  124.  
  125.  
  126. -- part 29 (field)
  127. -- low flags: 00
  128. -- high flags: 0000
  129. -- rect: left=24 top=114 right=131 bottom=141
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 0 / 0
  132. -- text alignment: 1
  133. -- font id: 3
  134. -- text size: 12
  135. -- style flags: 256
  136. -- line height: 16
  137. -- part name: 
  138.  
  139.  
  140. -- part 30 (field)
  141. -- low flags: 00
  142. -- high flags: 0000
  143. -- rect: left=142 top=114 right=131 bottom=259
  144. -- title width / last selected line: 0
  145. -- icon id / first selected line: 0 / 0
  146. -- text alignment: 1
  147. -- font id: 3
  148. -- text size: 12
  149. -- style flags: 256
  150. -- line height: 16
  151. -- part name: 
  152.  
  153.  
  154. -- part 31 (field)
  155. -- low flags: 00
  156. -- high flags: 0000
  157. -- rect: left=260 top=114 right=131 bottom=377
  158. -- title width / last selected line: 0
  159. -- icon id / first selected line: 0 / 0
  160. -- text alignment: 1
  161. -- font id: 3
  162. -- text size: 12
  163. -- style flags: 256
  164. -- line height: 16
  165. -- part name: 
  166.  
  167.  
  168. -- part 32 (field)
  169. -- low flags: 00
  170. -- high flags: 0000
  171. -- rect: left=378 top=114 right=131 bottom=495
  172. -- title width / last selected line: 0
  173. -- icon id / first selected line: 0 / 0
  174. -- text alignment: 1
  175. -- font id: 3
  176. -- text size: 12
  177. -- style flags: 256
  178. -- line height: 16
  179. -- part name: 
  180.  
  181.  
  182. -- part 39 (field)
  183. -- low flags: 01
  184. -- high flags: 0000
  185. -- rect: left=34 top=172 right=220 bottom=487
  186. -- title width / last selected line: 0
  187. -- icon id / first selected line: 0 / 0
  188. -- text alignment: 0
  189. -- font id: 3
  190. -- text size: 9
  191. -- style flags: 0
  192. -- line height: 11
  193. -- part name: 
  194.  
  195.  
  196. -- part contents for card part 20
  197. ----- text -----
  198. TODAY'S
  199. DATE
  200.  
  201. -- part contents for card part 26
  202. ----- text -----
  203. CURRENT
  204. TIME
  205.  
  206. -- part contents for card part 27
  207. ----- text -----
  208. TOTAL AIDS
  209. CASES
  210.  
  211. -- part contents for card part 28
  212. ----- text -----
  213. TOTAL AIDS
  214. DEATHS
  215.  
  216.  
  217.  
  218.  
  219.  
  220.  
  221.  
  222.  
  223.  
  224.  
  225.  
  226.  
  227.  
  228.  
  229.  
  230.  
  231.  
  232.  
  233.  
  234. DEATHS
  235.  
  236. -- part contents for card part 29
  237. ----- text -----
  238. 9/22/18
  239.  
  240. -- part contents for card part 30
  241. ----- text -----
  242. 8:45:28 PM
  243.  
  244. -- part contents for card part 31
  245. ----- text -----
  246. 398729
  247.  
  248. -- part contents for card part 32
  249. ----- text -----
  250. 110227
  251.  
  252. -- part contents for card part 39
  253. ----- text -----
  254. The AIDS Clock is based on a formula based on the rate of new cases and deaths from AIDS for the period from January 1 to August 24, 1987.  The numbers shown are only statistic approximations.  Should you desire more current information, call the Centers for Disease Control in Atlanta, Georgia at 404 329 3534 or the CDC AIDS Hotline at 1 800 342 AIDS.
  255.